FM Towns: Free Software Collection 6

home *** CD-ROM | disk | FTP | other *** search

/ FM Towns: Free Software Collection 6 / FM Towns Free Software Collection 6.iso / t_os / fadein / fadein.mcr < prev next >

Wrap

Text File | 1993-07-08 | 6KB | 501 lines

TEI EQU 0000011111000000111110000011111B KOU EQU 1111100000111110000001111100000B BUNKAI MACRO OP1 MOV EBX,EAX AND EAX,TEI AND EBX,KOU IFNB <OP1> SHR EBX,OP1 ENDIF ENDM COL_0 MACRO XOR EAX,EAX ENDM COL_1 MACRO XOR EAX,EAX ENDM COL_2 MACRO SHR EAX,4 AND EAX,0000100001000010000010000100001B ENDM COL_3 MACRO BUNKAI 5 MOV EDX,EAX ADD EAX,EAX ADD EAX,EDX SHR EAX,5 AND EAX,TEI MOV EDX,EBX ADD EBX,EBX ADD EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_4 MACRO SHR EAX,3 AND EAX,0001100011000110000110001100011B ENDM COL_5 MACRO BUNKAI 5 MOV EDX,EAX SHL EAX,2 ADD EAX,EDX SHR EAX,5 AND EAX,TEI MOV EDX,EBX SHL EBX,2 ADD EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_6 MACRO BUNKAI 4 MOV EDX,EAX ADD EAX,EAX ADD EAX,EDX SHR EAX,4 AND EAX,TEI MOV EDX,EBX ADD EBX,EBX ADD EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_7 MACRO MOV EBX,EAX AND EAX,TEI AND EBX,KOU MOV EDX,EAX SHL EAX,3 SUB EAX,EDX SHR EAX,5 AND EAX,TEI MOV EDX,EBX SHR EDX,3 SUB EBX,EDX SHR EBX,2 AND EBX,KOU ADD EAX,EBX ENDM COL_8 MACRO SHR EAX,2 AND EAX,0011100111001110001110011100111B ENDM COL_9 MACRO MOV EBX,EAX AND EAX,TEI AND EBX,KOU MOV EDX,EAX SHL EAX,3 ADD EAX,EDX SHR EAX,5 AND EAX,TEI MOV EDX,EBX SHR EDX,3 ADD EBX,EDX SHR EBX,2 AND EBX,KOU ADD EAX,EBX ENDM COL_10 MACRO BUNKAI 4 MOV EDX,EAX SHL EAX,2 ADD EAX,EDX SHR EAX,4 AND EAX,TEI MOV EDX,EBX SHL EBX,2 ADD EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_11 MACRO BUNKAI 5 MOV EDX,EAX ADD EDX,EDX ADD EAX,EDX SHL EDX,2 ADD EAX,EDX SHR EAX,5 AND EAX,TEI MOV EDX,EBX ADD EDX,EDX ADD EBX,EDX SHL EDX,2 ADD EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_12 MACRO BUNKAI 3 MOV EDX,EAX ADD EAX,EAX ADD EAX,EDX SHR EAX,3 AND EAX,TEI MOV EDX,EBX ADD EBX,EBX ADD EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_13 MACRO BUNKAI 5 MOV EDX,EAX ADD EDX,EDX ADD EDX,EAX SHL EDX,2 ADD EAX,EDX SHR EAX,5 AND EAX,TEI MOV EDX,EBX ADD EDX,EDX ADD EDX,EBX SHL EDX,2 ADD EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_14 MACRO MOV EBX,EAX AND EAX,TEI AND EBX,KOU MOV EDX,EAX SHL EAX,3 SUB EAX,EDX SHR EAX,4 AND EAX,TEI MOV EDX,EBX SHR EDX,3 SUB EBX,EDX SHR EBX,1 AND EBX,KOU ADD EAX,EBX ENDM COL_15 MACRO BUNKAI MOV EDX,EAX SHL EAX,4 SUB EAX,EDX SHR EAX,5 AND EAX,TEI MOV EDX,EBX SHR EBX,1 SHR EDX,5 SUB EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_16 MACRO SHR EAX,1 AND EAX,0111101111011110011110111101111B ENDM COL_17 MACRO BUNKAI 1 MOV EDX,EAX SHL EAX,4 ADD EAX,EDX MOV EDX,EBX SHR EDX,4 ADD EBX,EDX SHR EAX,5 AND EAX,TEI AND EBX,KOU ADD EAX,EBX ENDM COL_18 MACRO MOV EBX,EAX AND EAX,TEI AND EBX,KOU MOV EDX,EAX SHL EAX,3 ADD EAX,EDX SHR EAX,4 AND EAX,TEI MOV EDX,EBX SHR EDX,3 ADD EBX,EDX SHR EBX,1 AND EBX,KOU ADD EAX,EBX ENDM COL_19 MACRO BUNKAI MOV EDX,EAX SHL EAX,4 ADD EAX,EDX ADD EAX,EDX ADD EAX,EDX SHR EAX,5 AND EAX,TEI MOV EDX,EBX SHR EBX,1 SHR EDX,5 ADD EBX,EDX ADD EBX,EDX ADD EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_20 MACRO BUNKAI 3 MOV EDX,EAX SHL EAX,2 ADD EAX,EDX SHR EAX,3 AND EAX,TEI MOV EDX,EBX SHL EBX,2 ADD EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_21 MACRO BUNKAI 5 MOV EDX,EAX SHL EDX,2 ADD EAX,EDX SHL EDX,2 ADD EAX,EDX SHR EAX,5 AND EAX,TEI MOV EDX,EBX SHL EDX,2 ADD EBX,EDX SHL EDX,2 ADD EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_22 MACRO BUNKAI 4 MOV EDX,EAX ADD EDX,EDX ADD EAX,EDX SHL EDX,2 ADD EAX,EDX SHR EAX,4 AND EAX,TEI MOV EDX,EBX ADD EDX,EDX ADD EBX,EDX SHL EDX,2 ADD EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_23 MACRO BUNKAI MOV EDX,EAX SHL EAX,5 SUB EAX,EDX SHL EDX,3 SUB EAX,EDX SHR EAX,5 AND EAX,TEI MOV EDX,EBX SHR EDX,2 SUB EBX,EDX SHR EDX,3 SUB EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_24 MACRO BUNKAI 2 MOV EDX,EAX ADD EAX,EAX ADD EAX,EDX SHR EAX,2 AND EAX,TEI MOV EDX,EBX ADD EBX,EBX ADD EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_25 MACRO BUNKAI MOV EDX,EAX SHL EDX,3 ADD EAX,EDX ADD EAX,EDX ADD EAX,EDX SHR EAX,5 AND EAX,TEI MOV EDX,EBX SHR EBX,5 SHR EDX,2 ADD EBX,EDX ADD EBX,EDX ADD EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_26 MACRO BUNKAI 4 MOV EDX,EAX ADD EDX,EDX ADD EDX,EAX SHL EDX,2 ADD EAX,EDX SHR EAX,4 AND EAX,TEI MOV EDX,EBX ADD EDX,EDX ADD EDX,EBX SHL EDX,2 ADD EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_27 MACRO BUNKAI MOV EDX,EAX SHL EAX,5 SUB EAX,EDX SHL EDX,2 SUB EAX,EDX SHR EAX,5 AND EAX,TEI MOV EDX,EBX SHR EDX,3 SUB EBX,EDX SHR EDX,2 SUB EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_28 MACRO MOV EBX,EAX AND EAX,TEI AND EBX,KOU MOV EDX,EAX SHL EAX,3 SUB EAX,EDX SHR EAX,3 AND EAX,TEI MOV EDX,EBX SHR EDX,3 SUB EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_29 MACRO BUNKAI MOV EDX,EAX SHL EAX,5 SUB EAX,EDX SUB EAX,EDX SUB EAX,EDX SHR EAX,5 AND EAX,TEI MOV EDX,EBX SHR EDX,5 SUB EBX,EDX SUB EBX,EDX SUB EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_30 MACRO BUNKAI MOV EDX,EAX SHL EAX,5 SUB EAX,EDX SUB EAX,EDX SHR EAX,5 AND EAX,TEI MOV EDX,EBX SHR EDX,5 SUB EBX,EDX SUB EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_31 MACRO BUNKAI MOV EDX,EAX SHL EAX,5 SUB EAX,EDX SHR EAX,5 AND EAX,TEI MOV EDX,EBX SHR EDX,5 SUB EBX,EDX AND EBX,KOU ADD EAX,EBX ENDM COL_32 MACRO ENDM BCDBIN PROC MOV EBX,EAX AND EBX,0F0F0F0F0H MOV EDX,EBX SHR EDX,3 SUB EBX,EDX SUB EBX,EDX SUB EBX,EDX MOV EDX,EAX AND EDX,0F000F00H MOV ECX,EBX AND ECX,0FF00FF00H ADD EDX,ECX SHR EDX,3 MOV ECX,EDX ADD EDX,ECX ADD EDX,ECX SHR ECX,3 ADD EDX,ECX AND EAX,000F000FH AND EBX,00FF00FFH ADD EAX,EBX ADD EAX,EDX SHLD ECX,EAX,29 AND ECX,00011111111111111110000000000000B AND EAX,0000FFFFH ADD EAX,ECX SHR ECX,2 ADD EAX,ECX SHR ECX,3 SUB EAX,ECX SHR ECX,4 ADD EAX,ECX BCDBIN ENDP